﻿Public Class rptComprobanteCanje

    Public Sub LlenarReporte(ByVal CodCliente As String, ByVal FechaHoy As Date)
        Me.SP_ComprobanteCanjePuntosTableAdapter.Fill(Me.MegastoreDataSet1.SP_ComprobanteCanjePuntos, FechaHoy, CodCliente)
    End Sub

End Class